Discussion :

[LSRouge]

Bonjour,

Et bien pour mon premier message sur ce forum, je commence par une question :
Est ce qu'il existe des convertisseurs de fichiers excel 2007 en foxpro ??

Et oui, avec cette nouvelle version d'excel, on ne peut plus convertir en fichier DBF !!!

Auriez vous le meme souci et avez vous trouvé une solution ?

Merci d'avance.

LSR.

[SilkyRoad]

Bonsoir


Une solutin paliative consiste à utiliser une macro et le modèle ADO pour créer un fichier .dbf.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
'Necessite d'activer la reference
    'Microsoft ActiveX Data Objects x.x Library
'
Dim Cn As ADODB.Connection
Dim Fichier As String, Chemin As String
Chemin = "C:\dossier\excel"
Fichier = "maBase"
 
Set Cn = New ADODB.Connection
Cn.Open "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=" & _
    Chemin & ";"
 
Cn.Execute "Create Table " & Fichier & " (champTexte TEXT(30), champNum INTEGER)"
Cn.Execute "Insert Into " & Fichier & " (champTexte, champNum) Values ('Donnee01', 1004599)"
Cn.Execute "Insert Into " & Fichier & " (champTexte, champNum) Values ('Donnee02', 435455)"
 
Cn.Close
Set Cn = Nothing

bonne soirée
michel

[LSRouge]

Hello

Merci, je vais essayer ça tout de suite ...

Amicalement

LSR

[LSRouge]

re coucou

Helas ... mon Fox est si vieux que la creation de table ne se fait pas comme ca et ça plante ....
Grrr .....
Je vais essayer de voir le pb sous un autre angle !

Amicalement
LSR

[Daranc]

et passer par un CSV pour le rapatrier dans FOXPRO (si celui-ci peut les importer)

[LSRouge]

Hello

L'une de mes premieres idées mais il faut la structure avant !!!
Dans mon prg(VB6), je recupere le fichier excel, je reconfigure la structure pour qu'elle ressemble à ce que je veux donner en dbf ... et c'est la que ca coince, vu que excel 2007 neconvertit plusen format DBF ...
J'essaie à nouveau le paliatif de Michel ... il y a pi etre un souci de ,/....

Bon, j'y retourne ...

Amicalment

LSR.